home *** CD-ROM | disk | FTP | other *** search
/ Floppyshop 2 / Floppyshop - 2.zip / Floppyshop - 2.iso / diskmags / 3565-4.665 / dmg-4182 / source / megaball.bas (.txt) < prev    next >
Atari STOS Basic  |  1987-04-21  |  5KB  |  57 lines
  1. 1 DIM
  2. 10 FOR
  3. 100 EXTENSION (Index #18) (Token 0x80)
  4. 11 WAIT VBL
  5. 110 FOR
  6. 12 VARNAME
  7. 120 VARNAME
  8. 13 FOR
  9. 130 VARNAME
  10. 14 VARNAME
  11. 140 EXTENSION (Index #18) (Token 0x88)
  12. 15 SPRITE
  13. 150 EXTENSION (Index #18) (Token 0x84)
  14. 16 NEXT
  15. 17 CLS
  16. 170 LOGIC
  17. 18 SPRITE
  18. 180 VARNAME
  19. 190 INC
  20. 2 CURS
  21. 20 CLS
  22. 200 GOSUB
  23. 210 VARNAME
  24. 220 SCREEN$
  25. 230 VARNAME
  26. 240 PHYSIC
  27. 250 GOTO
  28. 260 LOGIC
  29. 265 CLS
  30. 266 FOR
  31. 267 CLS
  32. 270 REM creen$(physic,144,84)=PUB$(22+L)
  33. 275 CLS
  34. 277 FOR
  35. 280 COPY
  36. 290 FADE
  37. 3 PALETTE
  38. 300 VARNAME
  39. 310 CLS
  40. 315 WAIT VBL
  41. 319 LOGIC
  42. 320 VARNAME
  43. 330 VARNAME
  44. 340 VARNAME
  45. 350 VARNAME
  46. 360 VARNAME
  47. 370 VARNAME
  48. 380 VARNAME
  49. 390 VARNAME
  50. 400 VARNAME
  51. 410 VARNAME
  52. 5 FOR
  53. 6 SPRITE
  54. 7 SPRITE
  55. 8 VARNAME
  56. 9 FOR
  57.